home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / listings / v_02_04 / 2n04059b < prev    next >
Text File  |  1991-01-26  |  472b  |  23 lines
  1. { Declaring function RdKey using the assembly coded form
  2.   in LISTING 2 as a Turbo Pascal external. RdKey.asm is
  3.   assembled in TASM 1.0 or MASM 5.0 and RdKey.obj is made
  4.   available to the TP5.x compiler.
  5. }
  6.  
  7. interface
  8.  
  9. type
  10.    KeyRec = record
  11.               ch : char;
  12.               sc : byte;
  13.             end;
  14.  
  15. function RdKey(var Grabber : KeyRec)  : Char;
  16.  
  17. implementation
  18.  
  19. {$L RDKEY.OBJ}
  20.  
  21. function RdKey{(var Grabber : KeyRec)  : Char}; external;
  22.  
  23.